Caption = "Select month from top box, day of month from the above box and each digit of the year from the box at left. Use the supplied speed buttons to reset a given area to today's date."
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00800000&
Height = 2400
Index = 15
Left = 1995
TabIndex = 107
Top = 3600
Width = 1200
End
Begin SSPanel pnlMisc
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 1650
Index = 4
Left = 75
TabIndex = 104
Top = 1950
Width = 3120
Begin SSPanel pnlMisc
BevelOuter = 1 'Inset
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Index = 7
Left = 45
TabIndex = 106
Top = 360
Width = 600
Begin SSCommand cmdResetDay
BevelWidth = 1
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00000000&
Height = 225
Left = 15
RoundedCorners = 0 'False
TabIndex = 47
Top = 15
Width = 570
End
End
Begin SSOption optDay
Caption = "31"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 30
Left = 2505
TabIndex = 46
Top = 240
Width = 480
End
Begin SSOption optDay
Caption = "30"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 29
Left = 2505
TabIndex = 45
Top = 45
Width = 480
End
Begin SSOption optDay
Caption = "29"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 28
Left = 1905
TabIndex = 44
Top = 1410
Width = 480
End
Begin SSOption optDay
Caption = "28"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 27
Left = 1905
TabIndex = 43
Top = 1215
Width = 480
End
Begin SSOption optDay
Caption = "27"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 26
Left = 1905
TabIndex = 42
Top = 1020
Width = 480
End
Begin SSOption optDay
Caption = "26"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 25
Left = 1905
TabIndex = 41
Top = 825
Width = 480
End
Begin SSOption optDay
Caption = "25"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 24
Left = 1905
TabIndex = 40
Top = 630
Width = 480
End
Begin SSOption optDay
Caption = "24"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 23
Left = 1905
TabIndex = 39
Top = 435
Width = 480
End
Begin SSOption optDay
Caption = "23"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 22
Left = 1905
TabIndex = 38
Top = 240
Width = 480
End
Begin SSOption optDay
Caption = "22"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 21
Left = 1905
TabIndex = 37
Top = 45
Width = 480
End
Begin SSOption optDay
Caption = "21"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 20
Left = 1290
TabIndex = 36
Top = 1410
Width = 480
End
Begin SSOption optDay
Caption = "20"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 19
Left = 1290
TabIndex = 35
Top = 1215
Width = 480
End
Begin SSOption optDay
Caption = "19"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 18
Left = 1290
TabIndex = 34
Top = 1020
Width = 480
End
Begin SSOption optDay
Caption = "18"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 17
Left = 1290
TabIndex = 33
Top = 825
Width = 480
End
Begin SSOption optDay
Caption = "17"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 16
Left = 1290
TabIndex = 32
Top = 630
Width = 480
End
Begin SSOption optDay
Caption = "16"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 15
Left = 1290
TabIndex = 31
Top = 435
Width = 480
End
Begin SSOption optDay
Caption = "15"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 14
Left = 1290
TabIndex = 30
Top = 240
Width = 480
End
Begin SSOption optDay
Caption = "14"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 13
Left = 1290
TabIndex = 29
Top = 45
Width = 480
End
Begin SSOption optDay
Caption = "13"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 12
Left = 705
TabIndex = 28
Top = 1410
Width = 480
End
Begin SSOption optDay
Caption = "12"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 11
Left = 705
TabIndex = 27
Top = 1215
Width = 480
End
Begin SSOption optDay
Caption = "11"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 10
Left = 705
TabIndex = 26
Top = 1020
Width = 480
End
Begin SSOption optDay
Caption = "10"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 9
Left = 705
TabIndex = 25
Top = 825
Width = 480
End
Begin SSOption optDay
Caption = "9"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 8
Left = 705
TabIndex = 24
Top = 630
Width = 480
End
Begin SSOption optDay
Caption = "8"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 7
Left = 705
TabIndex = 23
Top = 435
Width = 480
End
Begin SSOption optDay
Caption = "7"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 6
Left = 705
TabIndex = 22
Top = 240
Width = 480
End
Begin SSOption optDay
Caption = "6"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 5
Left = 705
TabIndex = 21
Top = 45
Width = 480
End
Begin SSOption optDay
Caption = "5"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 4
Left = 75
TabIndex = 20
Top = 1410
Width = 480
End
Begin SSOption optDay
Caption = "4"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 3
Left = 75
TabIndex = 19
Top = 1215
Width = 480
End
Begin SSOption optDay
Caption = "3"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 2
Left = 75
TabIndex = 18
Top = 1020
Width = 480
End
Begin SSOption optDay
Caption = "2"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 1
Left = 75
TabIndex = 17
Top = 825
Width = 480
End
Begin SSOption optDay
Caption = "1"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 0
Left = 75
TabIndex = 16
Top = 630
Width = 480
End
Begin SSPanel pnlDay
BevelOuter = 1 'Inset
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Left = 45
TabIndex = 105
Top = 45
Width = 600
End
End
Begin SSPanel pnlMisc
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 2400
Index = 2
Left = 75
TabIndex = 97
Top = 3600
Width = 1920
Begin SSPanel pnlYear
BevelOuter = 1 'Inset
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Left = 45
TabIndex = 103
Top = 45
Width = 690
End
Begin SSPanel pnlMisc
BevelOuter = 0 'None
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 2025
Index = 6
Left = 45
TabIndex = 102
Top = 300
Width = 435
Begin SSOption optThousands
Caption = "0"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 0
Left = 30
TabIndex = 57
Top = 1785
Width = 390
End
Begin SSOption optThousands
Caption = "9"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 9
Left = 30
TabIndex = 56
Top = 1590
Width = 390
End
Begin SSOption optThousands
Caption = "8"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 8
Left = 30
TabIndex = 55
Top = 1395
Width = 390
End
Begin SSOption optThousands
Caption = "7"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 7
Left = 30
TabIndex = 54
Top = 1200
Width = 390
End
Begin SSOption optThousands
Caption = "6"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 6
Left = 30
TabIndex = 53
Top = 1005
Width = 390
End
Begin SSOption optThousands
Caption = "5"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 5
Left = 30
TabIndex = 52
Top = 810
Width = 390
End
Begin SSOption optThousands
Caption = "4"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 4
Left = 30
TabIndex = 51
Top = 615
Width = 390
End
Begin SSOption optThousands
Caption = "3"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 3
Left = 30
TabIndex = 50
Top = 420
Width = 390
End
Begin SSOption optThousands
Caption = "2"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 2
Left = 30
TabIndex = 49
Top = 225
Width = 390
End
Begin SSOption optThousands
Caption = "1"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 1
Left = 30
TabIndex = 48
Top = 30
Width = 390
End
End
Begin SSPanel pnlMisc
BevelOuter = 0 'None
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 2025
Index = 8
Left = 510
TabIndex = 101
Top = 300
Width = 435
Begin SSOption optHundreds
Caption = "1"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 1
Left = 30
TabIndex = 58
Top = 30
Width = 390
End
Begin SSOption optHundreds
Caption = "2"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 2
Left = 30
TabIndex = 59
Top = 225
Width = 390
End
Begin SSOption optHundreds
Caption = "3"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 3
Left = 30
TabIndex = 60
Top = 420
Width = 390
End
Begin SSOption optHundreds
Caption = "4"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 4
Left = 30
TabIndex = 61
Top = 615
Width = 390
End
Begin SSOption optHundreds
Caption = "5"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 5
Left = 30
TabIndex = 62
Top = 810
Width = 390
End
Begin SSOption optHundreds
Caption = "6"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 6
Left = 30
TabIndex = 63
Top = 1005
Width = 390
End
Begin SSOption optHundreds
Caption = "7"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 7
Left = 30
TabIndex = 64
Top = 1200
Width = 390
End
Begin SSOption optHundreds
Caption = "8"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 8
Left = 30
TabIndex = 65
Top = 1395
Width = 390
End
Begin SSOption optHundreds
Caption = "9"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 9
Left = 30
TabIndex = 66
Top = 1590
Width = 390
End
Begin SSOption optHundreds
Caption = "0"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 0
Left = 15
TabIndex = 67
Top = 1785
Width = 390
End
End
Begin SSPanel pnlMisc
BevelOuter = 0 'None
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 2025
Index = 9
Left = 975
TabIndex = 100
Top = 300
Width = 435
Begin SSOption optTens
Caption = "1"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 1
Left = 30
TabIndex = 68
Top = 30
Width = 390
End
Begin SSOption optTens
Caption = "2"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 2
Left = 30
TabIndex = 69
Top = 225
Width = 390
End
Begin SSOption optTens
Caption = "3"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 3
Left = 30
TabIndex = 70
Top = 420
Width = 390
End
Begin SSOption optTens
Caption = "4"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 4
Left = 30
TabIndex = 71
Top = 615
Width = 390
End
Begin SSOption optTens
Caption = "5"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 5
Left = 30
TabIndex = 72
Top = 810
Width = 390
End
Begin SSOption optTens
Caption = "6"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 6
Left = 30
TabIndex = 73
Top = 1005
Width = 390
End
Begin SSOption optTens
Caption = "7"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 7
Left = 30
TabIndex = 74
Top = 1200
Width = 390
End
Begin SSOption optTens
Caption = "8"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 8
Left = 30
TabIndex = 75
Top = 1395
Width = 390
End
Begin SSOption optTens
Caption = "9"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 9
Left = 30
TabIndex = 76
Top = 1590
Width = 390
End
Begin SSOption optTens
Caption = "0"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 0
Left = 30
TabIndex = 77
Top = 1785
Width = 390
End
End
Begin SSPanel pnlMisc
BevelOuter = 0 'None
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 2025
Index = 10
Left = 1440
TabIndex = 99
Top = 300
Width = 435
Begin SSOption optOnes
Caption = "1"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 1
Left = 30
TabIndex = 78
Top = 30
Width = 390
End
Begin SSOption optOnes
Caption = "2"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 2
Left = 30
TabIndex = 79
Top = 225
Width = 390
End
Begin SSOption optOnes
Caption = "3"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 3
Left = 30
TabIndex = 80
Top = 420
Width = 390
End
Begin SSOption optOnes
Caption = "4"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 4
Left = 30
TabIndex = 81
Top = 615
Width = 390
End
Begin SSOption optOnes
Caption = "5"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 5
Left = 30
TabIndex = 82
Top = 810
Width = 390
End
Begin SSOption optOnes
Caption = "6"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 6
Left = 30
TabIndex = 83
Top = 1005
Width = 390
End
Begin SSOption optOnes
Caption = "7"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 7
Left = 30
TabIndex = 84
Top = 1200
Width = 390
End
Begin SSOption optOnes
Caption = "8"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 8
Left = 30
TabIndex = 85
Top = 1395
Width = 390
End
Begin SSOption optOnes
Caption = "9"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 9
Left = 30
TabIndex = 86
Top = 1590
Width = 390
End
Begin SSOption optOnes
Caption = "0"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 0
Left = 30
TabIndex = 87
Top = 1785
Width = 390
End
End
Begin SSPanel pnlMisc
BevelOuter = 1 'Inset
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Index = 11
Left = 765
TabIndex = 98
Top = 45
Width = 1110
Begin SSCommand cmdResetYear
BevelWidth = 1
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00000000&
Height = 225
Left = 15
RoundedCorners = 0 'False
TabIndex = 88
Top = 15
Width = 1080
End
End
End
Begin SSPanel pnlMisc
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 690
Index = 1
Left = 75
TabIndex = 94
Top = 1260
Width = 3120
Begin SSPanel pnlMisc
BevelOuter = 1 'Inset
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Index = 12
Left = 45
TabIndex = 96
Top = 360
Width = 585
Begin SSCommand cmdResetMonth
BevelWidth = 1
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00000000&
Height = 225
Left = 15
RoundedCorners = 0 'False
TabIndex = 15
Top = 15
Width = 555
End
End
Begin SSOption optMonth
Caption = "Jan"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 0
Left = 675
TabIndex = 3
Top = 45
Width = 585
End
Begin SSOption optMonth
Caption = "Feb"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 1
Left = 675
TabIndex = 4
Top = 240
Width = 585
End
Begin SSOption optMonth
Caption = "Mar"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 2
Left = 675
TabIndex = 5
Top = 435
Width = 585
End
Begin SSOption optMonth
Caption = "Apr"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 3
Left = 1290
TabIndex = 6
Top = 45
Width = 585
End
Begin SSOption optMonth
Caption = "May"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 4
Left = 1290
TabIndex = 7
Top = 240
Width = 585
End
Begin SSOption optMonth
Caption = "Jun"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 5
Left = 1290
TabIndex = 8
Top = 435
Width = 585
End
Begin SSOption optMonth
Caption = "Jul"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 6
Left = 1905
TabIndex = 9
Top = 45
Width = 585
End
Begin SSOption optMonth
Caption = "Aug"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 7
Left = 1905
TabIndex = 10
Top = 240
Width = 585
End
Begin SSOption optMonth
Caption = "Sep"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 8
Left = 1905
TabIndex = 11
Top = 435
Width = 585
End
Begin SSOption optMonth
Caption = "Oct"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 9
Left = 2505
TabIndex = 12
Top = 45
Width = 585
End
Begin SSOption optMonth
Caption = "Nov"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 10
Left = 2505
TabIndex = 13
Top = 240
Width = 585
End
Begin SSOption optMonth
Caption = "Dec"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 195
Index = 11
Left = 2505
TabIndex = 14
Top = 435
Width = 585
End
Begin SSPanel pnlMonth
BevelOuter = 1 'Inset
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Left = 45
TabIndex = 95
Top = 45
Width = 585
End
End
End
Begin SSPanel pnlMisc
Font3D = 3 'Inset w/light shading
Height = 6090
Index = 0
Left = 3285
RoundedCorners = 0 'False
TabIndex = 92
Top = 0
Width = 5730
Begin SSPanel pnlMisc
BorderWidth = 2
Caption = "Reset to Current Time..."
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Index = 17
Left = 1890
TabIndex = 112
Top = 1830
Width = 1965
End
Begin SSCommand cmdResetTime
BevelWidth = 1
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00000000&
Height = 375
Left = 1890
RoundedCorners = 0 'False
TabIndex = 91
Top = 2085
Width = 1965
End
Begin SSPanel pnlMisc
Alignment = 0 'Left Justify - TOP
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00800000&
Height = 1860
Index = 16
Left = 1365
TabIndex = 110
Top = 2655
Width = 2970
Begin Label lblMisc
BackColor = &H00C0C0C0&
Caption = "Select the time by clicking on the desired large inner HOUR number and small outer MINUTE number. Indicate the appropriate time of day by selecting either AM or PM. Use the speed button displaying the current time to reset buttons to the current time. When satisfied with this screen click on the OK button. Cancel discards all changes."
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00800000&
Height = 1800
Left = 45
TabIndex = 111
Top = 30
Width = 2865
End
End
Begin SSPanel pnlTimeEntered
BevelInner = 1 'Inset
BorderWidth = 2
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00800000&
Height = 435
Left = 60
TabIndex = 109
Top = 60
Width = 5610
End
Begin SSOption optAMPM
Alignment = 1 'Right Justify
Caption = "&AM"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00000080&
Height = 345
Index = 0
Left = 300
TabIndex = 89
Top = 720
Value = -1 'True
Width = 570
End
Begin SSOption optAMPM
Caption = "&PM"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 345
Index = 1
Left = 4935
TabIndex = 90
TabStop = 0 'False
Top = 720
Width = 540
End
Begin SSCommand cmdOK
BevelWidth = 1
Caption = "&OK"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00800000&
Height = 375
Left = 4680
RoundedCorners = 0 'False
TabIndex = 0
Top = 5610
Width = 930
End
Begin SSCommand cmdCancel
BevelWidth = 1
Caption = "&Cancel"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00800000&
Height = 375
Left = 150
RoundedCorners = 0 'False
TabIndex = 1
Top = 5580
Width = 930
End
Begin Image imgMinute
Height = 225
Index = 0
Left = 2760
Top = 675
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 1
Left = 3015
Top = 690
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 2
Left = 3270
Top = 720
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 3
Left = 3525
Top = 780
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 4
Left = 3780
Top = 870
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 5
Left = 4035
Top = 990
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 6
Left = 4260
Top = 1140
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 7
Left = 4485
Top = 1290
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 8
Left = 4680
Top = 1485
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 9
Left = 4860
Top = 1680
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 10
Left = 5025
Top = 1905
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 11
Left = 5145
Top = 2160
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 12
Left = 5235
Top = 2415
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 13
Left = 5310
Top = 2685
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 14
Left = 5340
Top = 2955
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 15
Left = 5355
Top = 3225
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 16
Left = 5340
Top = 3495
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 17
Left = 5310
Top = 3765
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 18
Left = 5235
Top = 4035
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 19
Left = 5145
Top = 4290
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 20
Left = 5025
Top = 4545
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 21
Left = 4860
Top = 4770
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 22
Left = 4680
Top = 4965
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 23
Left = 4485
Top = 5160
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 24
Left = 4260
Top = 5310
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 25
Left = 4035
Top = 5460
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 26
Left = 3780
Top = 5580
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 27
Left = 3525
Top = 5670
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 28
Left = 3270
Top = 5730
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 29
Left = 3015
Top = 5760
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 30
Left = 2760
Top = 5775
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 31
Left = 2505
Top = 5760
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 32
Left = 2250
Top = 5730
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 33
Left = 1995
Top = 5670
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 34
Left = 1740
Top = 5580
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 35
Left = 1485
Top = 5460
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 36
Left = 1260
Top = 5310
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 37
Left = 1035
Top = 5160
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 38
Left = 840
Top = 4965
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 39
Left = 660
Top = 4770
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 40
Left = 495
Top = 4545
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 41
Left = 375
Top = 4290
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 42
Left = 285
Top = 4035
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 43
Left = 210
Top = 3765
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 44
Left = 180
Top = 3495
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 45
Left = 165
Top = 3225
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 46
Left = 180
Top = 2955
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 47
Left = 210
Top = 2685
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 48
Left = 285
Top = 2415
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 49
Left = 375
Top = 2160
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 50
Left = 495
Top = 1905
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 51
Left = 660
Top = 1680
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 52
Left = 840
Top = 1485
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 53
Left = 1035
Top = 1290
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 54
Left = 1260
Top = 1140
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 55
Left = 1485
Top = 990
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 56
Left = 1740
Top = 870
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 57
Left = 1995
Top = 780
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 58
Left = 2250
Top = 720
Width = 225
End
Begin Image imgMinute
Height = 225
Index = 59
Left = 2505
Top = 690
Width = 225
End
Begin Image imgHour
Height = 495
Index = 12
Left = 2625
Top = 930
Width = 495
End
Begin Image imgHour
Height = 495
Index = 1
Left = 3720
Top = 1200
Width = 495
End
Begin Image imgHour
Height = 495
Index = 2
Left = 4545
Top = 1995
Width = 495
End
Begin Image imgHour
Height = 495
Index = 3
Left = 4830
Top = 3090
Width = 495
End
Begin Image imgHour
Height = 495
Index = 4
Left = 4545
Top = 4185
Width = 495
End
Begin Image imgHour
Height = 495
Index = 5
Left = 3705
Top = 4980
Width = 495
End
Begin Image imgHour
Height = 495
Index = 6
Left = 2625
Top = 5250
Width = 495
End
Begin Image imgHour
Height = 495
Index = 7
Left = 1545
Top = 4980
Width = 495
End
Begin Image imgHour
Height = 495
Index = 8
Left = 705
Top = 4185
Width = 495
End
Begin Image imgHour
Height = 495
Index = 9
Left = 420
Top = 3090
Width = 495
End
Begin Image imgHour
Height = 495
Index = 10
Left = 705
Top = 1965
Width = 495
End
Begin Image imgHour
Height = 495
Index = 11
Left = 1545
Top = 1200
Width = 495
End
End
Begin PictureClip pclHour
Cols = 12
Location = "5940,990,6150,-15"
Picture = DTENTRY.FRX:0302
Rows = 2
End
Begin PictureClip pclMinute
Cols = 60
Location = "13500,450,6555,-90"
Picture = DTENTRY.FRX:370C
Rows = 2
End
End
Option Explicit
Dim miLastHourDown%, miLastMinuteDown%, mbLoading%, miAMPM%
Dim miOldMonth%, miOldDay%, miOldThousands%, miOldHundreds%
